home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
program
/
ddj0897.zip
/
RCSC.ZIP
/
PACKAGES
/
AWK320.ZIP
/
ARRAY.AWK
< prev
next >
Wrap
Text File
|
1990-02-08
|
248b
|
8 lines
# demonstrate set operations on an array
$1 == "IN" { if ($2 in a) print $2, a[$2]; else print $2, "is not in a"; next}
$1 == "DEL" { delete a[$2]; next }
$0 == "ALL" { for (i in a) printf("a[%s] = %s\n", i, a[i]) }
NF == 2 { a[$1] = $2 }